﻿Public Class ENVIRONMENTCLASS '(ใช้เก็บค่าทั่วไปของระบบ)
    Public Class PATIENT
        'PATIENT
        Public Shared ReadOnly NewPatientWord As String = " (คนไข้ใหม่)"
    End Class
    Public Class GETORDERSEQ
        Public Shared ReadOnly SQLCOMMAND As String = "UPDATE myfriendsdb.masordseq SET `SEQ` = `SEQ` +1   WHERE(ID > 1 AND YR = 58 AND `MM` = DATE_FORMAT(NOW(),'%m')); "
    End Class
    '  Public Class 
    Public Class PENNAME
        'PENNAME
        Public Shared ReadOnly PenNameThai As String = "นามแฝง ชื่อสกุลแฝง"
        Public Shared ReadOnly PenNameEnglish As String = "PENNAME PENNAME"
        Public Shared ReadOnly PenNameColor As System.Drawing.Color = Color.Red
    End Class
    Public Class MACHINE
        Public Shared ClinicID As String = ""
        Public Shared ClinicCode As String = "N/A"
        Public Shared ClinicName As String = "N/A"
    End Class
    Public Class DB
        Public Shared MsgInsert As String = "บันทึกสำเร็จ"
        Public Shared MsgUpdate As String = "แก้ใขสำเร็จ"
        Public Shared MsgInsertError As String = "บันทึกไม่สำเร็จ"
        Public Shared MsgUpdateError As String = "แก้ใขไม่สำเร็จ"
    End Class
    Public Class LABID
        Public Shared LABID As Integer = 4
    End Class
    Public Class CLINICID
        Public Shared MED As Integer = 7
        Public Shared MED_NAME As String = "อายุรกรรม"
    End Class
    Public Class DEPARTMENT_ER
        Public Shared ER_ID As String = "2"
        Public Shared ER_NAME As String = "ฉุกเฉิน"
        Public Shared URGEN_DEFAULT As Integer = 5
    End Class
    Public Class ORDEREVENT
        Public Shared POLICIES_LAB As Integer = 1
        Public Shared POLICIES_NORMAL As Integer = 0

        Public Shared DELMSGCHKIN_T_TH As String = "ออเดอร์นี้ได้ถูกยกเลิกแล้ว "
        Public Shared DELMSGCHKIN_ENG As String = "Order Cancel Complete "

        Public Shared DELMSGCHKIN_F_ENG As String = "Order Checkin Complete Cannot Cancel"
        Public Shared DELMSGCHKIN_F_TH As String = "ออเดอร์ไม่สามารถยกเลิกได้"

        Public Shared DELMSGCOMP_T_TH As String = "ออเดอร์นี้ได้ถูกยกเลิกแล้ว"
        Public Shared DELMSGCOMP_T_ENG As String = "Order Cancel Complete "

        Public Shared DELMSGCOMP_F_TH As String = "ออเดอร์นี้ไม่สามารถยกเลิกได้เนื่องจาก เสร็จสิ้นกระบวนการทำงานแล้ว"
        Public Shared DELMSGCOMP_F_ENG As String = "Order Complete Cannot Cancel"

    End Class

    Public Class USERUSEEVENT
        Public Shared ADD As String = "PADD"
        Public Shared EDIT As String = "PUPD"
        Public Shared DELETE As String = "PDEL"
        Public Shared VIEW As String = "PSEE"
        Public Shared PRINT As String = "PPRT"
        Public Shared USERFAIL As String = "USRFAIL"
        '
        Public Shared ADDMSG_F As String = "ไม่มีสิทธิ์ในการบันทึกข้อมูล"
        Public Shared EDITMSG_F As String = "ไม่มีสิทธิ์ในการแก้ไขข้อมูล"
        Public Shared DELMSG_F As String = "ไม่มีสิทธิ์ในการลบข้อมูล"
        Public Shared VIEWMSG_F As String = "ไม่มีสิทธิ๋ในการดึงข้อมูลมาแสดงผล"
        Public Shared PRINTMSG_F As String = "ไม่มีสิทธิ๋ในการปริ้นเอกสาร"

        Public Shared USERFAILMSG_TH_F As String = "รหัสผ่านไม่ถูกต้อง กรุณาล๊อคอินใหม่อีกครั้ง"
        Public Shared USERFAILMSG_EN_F As String = "Wrong Password. Please try again."

        Public Shared USERFAILMSG_POLICIES_TH As String = "รหัสผ่านไม่มีสิทธิ์ในการใช้งานโปรแกรม"

        Public Shared USERFAILMSG_NOTREGIST_TH As String = "รหัสผ่านนี้ไม่มีอยู่ในระบบ"

        Public Shared USERCANNOT_LOGIN_TH As String = "กรุณา login เข้าใช้งาน"


        Public Shared ADDMSG_T As String = ""
        Public Shared EDITMSG_T As String = ""
        Public Shared DELMSG_T As String = ""
        Public Shared VIEWMSG_T As String = ""
        Public Shared PRINTMSG_T As String = ""


    End Class

    Public Class PRCSTAT
        Public Shared PRCOPD As Integer = 1
    End Class
    Public Class DEFAULTPRG
        Public Shared IDPRG As String = "1"

    End Class
    Public Class MASCSTATUS
        Public Shared wait As Integer = 1
        Public Shared waitdiag As Integer = 2
        Public Shared diag As Integer = 3
        Public Shared waitsend As Integer = 4
        Public Shared send As Integer = 5
        Public Shared complete As Integer = 6
    End Class
    Public Class GETTAGPROGRAM
        Public Shared LAB As String = "LAB000"
        Public Shared XRAY As String = "XRY000"
        Public Shared OPER As String = "OPR000"

    End Class
    Public Class MASORDSTATUS
        Public Shared REQUEST As Integer = 1
        Public Shared CHECKIN As Integer = 2
        Public Shared COMPLETE As Integer = 3
        Public Shared PASS As Integer = 4
        Public Shared CANCEL As Integer = 5
        Public Shared SOMECOMPLETE As Integer = 6
    End Class
    Public Class PICNAME
        Public Shared PICIDCARD As String = "\PicIDCard.jpg"
        Public Shared PICHN As String = "\HN_Profile.jpg"

        Public Shared TYPEPROFILE As String = "profile"
        Public Shared TYPEIDCARD As String = "idcard"
        Public Shared NOPIC As String = "NoPic"
        Public Shared CARD As String = "Card"
    End Class

End Class

